-- card: 14149 from stack: in.0
-- bmap block id: 14431
-- flags: 0000
-- background id: 15491
-- name: 
----- HyperTalk script -----
-- make the star circle Newton's head
on StarCircle
  set cursor to none
  show btn "star"
  repeat 4
    set the loc of btn "star" to 266,126
    wait 5
    set the loc of btn "star" to 243,128
    wait 5
    set the loc of btn "star" to 221,128
    wait 5
    set the loc of btn "star" to 198,128
    wait 5
    set the loc of btn "star" to 181,121
    wait 5
    set the loc of btn "star" to 196,112
    wait 5
    set the loc of btn "star" to 261,113
  end repeat
end StarCircle


-- part 1 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=245 top=97 right=129 bottom=277
-- title width / last selected line: 0
-- icon id / first selected line: 284 / 284
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: star


-- part 2 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=474 top=195 right=224 bottom=506
-- title width / last selected line: 0
-- icon id / first selected line: 24471 / 24471
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: MapBtn
----- HyperTalk script -----
-- Go to the Map stack.  "CameFrom" holds the name of this cd
-- so the Map can hilite the cd the user came from.

on mouseUp
  global DisSpeed, CameFrom, MapMode
  set the hilite of me to true
  lock Screen
  set the hilite of me to false
  put "Introduction to" into CameFrom
  put last char of the icon of bg btn "section" into sectionNum
  if sectionNum > 3 then put 2 into sectionNum
  put "section" && sectionNum & ":" into SubCd
  visual DisSpeed
  if MapMode is "graph" then
    go to cd SubCd of stack "•HC 2.0-3"
    HiliteMap
  else
    go to cd "indexmap" of stack "•HC 2.0-3"
  end if
  unlock screen with DisSpeed
end mouseUp